C *** MODULE modzkus ***
C...Translated by Pacific-Sierra Research vf90 Personal 3.4N5 22:22:11 8/13/00
C...Switches:                     
      integer n
      parameter (n = 3)
      integer nvolani
      integer a(3), b(3)
      logical volna(3)
      real x1(3), x2(3)
      common /modzkus/x1, x2, nvolani, a, b, volna
C *** END MODULE modzkus ***
